Profile of (eval 253)[Sub/Quote.pm:3]

Filename	(eval 253)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 13 statements in 451µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	13µs	39µs	JSON::Schema::Modern::Result::::BEGIN@6 JSON::Schema::Modern::Result::BEGIN@6
1	1	1	11µs	46µs	Method::Generate::Accessor::_Generated::BEGIN@20.107
1	1	1	7µs	7µs	Method::Generate::Accessor::_Generated::BEGIN@11.106
0	0	0	0s	0s	JSON::Schema::Modern::Result::output_format

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	2µs			my $isa_check_for_output_5fformat = ${$_[1]->{"\$isa_check_for_output_5fformat"}};
3	1	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
5					package JSON::Schema::Modern::Result;
6	2	76µs	2	65µs	# spent 39µs (13+26) within JSON::Schema::Modern::Result::BEGIN@6 which was called: # once (13µs+26µs) by Sub::Quote::_clean_eval at line 6 no warnings 'closure'; # spent 39µs making 1 call to JSON::Schema::Modern::Result::BEGIN@6 # spent 26µs making 1 call to warnings::unimport
7					sub output_format {
8					($_QUOTED,$_UNQUOTED) if 0;
9					# BEGIN quote_sub PRELUDE
10					package Method::Generate::Accessor::_Generated;
11					# spent 7µs within Method::Generate::Accessor::_Generated::BEGIN@11.106 which was called: # once (7µs+0s) by Sub::Quote::_clean_eval at line 16 BEGIN {
12	1	1µs			$^H = 1762;
13	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
14	1	6µs			%^H = (
15					);
16	1	65µs	1	7µs	} # spent 7µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@11.106
17					# END quote_sub PRELUDE
18					(@_ > 1
19					? scalar do { my $value = $_[1];
20	2	282µs	2	81µs	# spent 46µs (11+35) within Method::Generate::Accessor::_Generated::BEGIN@20.107 which was called: # once (11µs+35µs) by Sub::Quote::_clean_eval at line 20 (do { no warnings "void"; package Type::Tiny; ((defined($value) and !ref($value) and $value =~ m{\A(?:(?:basic\|d(?:ata_only\|etailed)\|flag\|strict_basic\|terse\|verbose))\z})) or Type::Tiny::_failed_check($isa_check_for_output_5fformat, "Enum[\"flag\",\"basic\",\"strict_basic\",\"detailed\",\"verbose\",\"terse\",\"data_only\"]", $value, "attribute_name","output_format","attribute_step","isa check","mgaca","0","varname","\$self->{\"output_format\"}"); $value }), # spent 46µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@20.107 # spent 35µs making 1 call to warnings::unimport
21					($_[0]->{"output_format"} = $value),
22					($_[0]->{"output_format"}),
23					}
24					: $_[0]->{"output_format"}
25					) }
26	1	2µs			$$_UNQUOTED = \&output_format;
27					}
28	1	16µs			1;
29
30					;